The structural analysis software RFEM 6 is the basis of a modular software system. The main program RFEM 6 is used to define structures, materials, and loads of planar and spatial structural systems consisting of plates, walls, shells, and members. The program also allows you to create combined structures as well as to model solid and contact elements.
RSTAB 9 is a powerful analysis and design software for 3D beam, frame, or truss structure calculations, reflecting the current state of the art and helping structural engineers meet requirements in modern civil engineering.
Do you often spend too long calculating cross-sections? Dlubal Software and the RSECTION stand-alone program facilitate your work by determining section properties of various cross-sections and performing a subsequent stress analysis.
Do you always know where the wind is blowing from? From the direction of innovation, of course! With RWIND 2, you have a program at your side that uses a digital wind tunnel for the numerical simulation of wind flows. The program simulates these flows around any building geometry and determines the wind loads on the surfaces.
Are you looking for an overview of snow load zones, wind zones, and seismic zones? Then you are in the right place. Use the Geo-Zone Tool to determine quickly and efficiently snow loads, wind speeds, and seismic data according to ASCE 7‑16 and other international standards.
Would you like to try out the capabilities of the Dlubal Software programs? You have the opportunity to do so! The free 90-day full version allows you to thoroughly test all our programs.
Dim model As RFEM5.model Set model = GetObject(, "RFEM5.Model") model.GetApplication.LockLicense On Error GoTo e Dim data As IModelData Set data = model.GetModelData Dim members(0) As RFEM5.Member members(0).No = 3 members(0).LineNo = 12 members(0).Type = ResultBeamType members(0).StartCrossSectionNo = 1 members(0).EndCrossSectionNo = 1 members(0).Comment = "result beam 1" data.PrepareModification data.SetMembers members data.FinishModification
Dim iMem As IMember Set iMem = data.GetMember(3, AtNo) Dim iRMem As IResultBeam Set iRMem = iMem.GetExtraData Dim RMem As ResultBeam RMem = iRMem.GetData RMem.IncludeSurfaces = "1" RMem.IncludeSolids = "all" RMem.Integrate = WithinCuboidGeneral Dim params(0 To 3) As Double RMem.Parameters = params RMem.Parameters(0) = 0.5 RMem.Parameters(1) = 0.5 RMem.Parameters(2) = 0.1 RMem.Parameters(3) = 0.1 data.PrepareModification iRMem.SetData RMem data.FinishModification